home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Programmer Power Tools
/
Programmer Power Tools.iso
/
surfmodl
/
surfm203.arc
/
SURFSRC.ARC
/
TITLESCR.INC
< prev
next >
Wrap
Text File
|
1987-01-09
|
1KB
|
22 lines
procedure TITLESCREEN;
begin
Clrscr;
writeln(' This is SURFMODL, a public domain surface modeling program.');
writeln('SURFMODL is distributed without any warranty, express or implied.');
writeln('In no event shall the authors be liable for any loss of profit or');
writeln('any other commercial damage, including but not limited to');
writeln('special, incidental, consequential or other damages.');
writeln;
writeln('SURFMODL may be freely distributed, or distributed at nominal');
writeln('copying/mailing fee, but may not be otherwise charged for.');
writeln('It may not be distributed with commercial software without');
writeln('express written permission of the principle author:');
writeln(' Kenneth Van Camp');
writeln(' P.O. Box 784');
writeln(' Stroudsburg, PA 18360');
writeln;
writeln ('Press any key...');
repeat until keypressed;
while keypressed do if (readkey = ' ') then; {clear keyboard buffer}
end; { procedure TITLESCREEN }